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И.  А.  Андронов,  г.  Одесса 

ОДА  ФОРТУ 


Впервые  реализация  Форта  для  БК-0010 
появилась  в  1986  г.  трудами  ленинградцев 
М.  Ефимова  и  А.  Цаплева.  По  тем  временам 
для  пользователей  БК-0010  это  был  настоя¬ 
щий  прорыв  замкнутого  круга  под  названием 
«Фокал».  Однако  первые  радостные  голоса 
быстро  утихли,  когда  выяснилось,  что  Форт 
на  БК-0010  оставляет  пользователю  всего 
лишь  3-3. 5  Кб  памяти,  чего  может  хватить 
разве  только  для  учебно- познавательных 
целей.  Причина  этого  -  ставший  притчей  во 
языцех  мизерный  ресурс  ОЗУ  БК-0010.  По¬ 
этому  Форт  для  БК-0010  версии  1986  года  не 
получил  распространения. 

Все  другие  причины  непопулярности 
Форта,  в  том  числе  и  его  необычность,  я 
считаю  необоснованными.  Утверждать  об¬ 
ратное  -  значит  подвергать  сомнению  «рас¬ 
торопность»  пользователей  БК-0010,  кото¬ 
рые  одолели  и  не  такие  «необычности». 

Еще  чаще  говорят  о  сложности  освоения 
Форта,  но  об  этом  почти  всегда  можно  ус¬ 
лышать  только  от  тех,  кто  и  не  пытался 
серьезно  им  овладеть.  Вообще  же,  с  учетом 
появившейся  литературы  о  Форте  и  на  ос¬ 
новании  личного  опыта,  смею  утверждать, 
что  Форт  в  освоении  легче,  чем  Бейсик. 

Что  же  касается  «необычности»,  то 
этот  термин  говорит  сам  за  себя:  чего  не 
знаешь,  то  и  необычно.  Если  же  разо¬ 
браться  по  существу,  то  главная  необыч¬ 
ность  Форта  заключена  в  стереотипе 
мышления  программирующего  на  импера¬ 
тивных  языках.  По  мере  «вхождения»  в 
Форт  мышление  быстро  адаптируется. 

Какими  же  «плюсами»  отличается 
Форт  от  остальных  языков? 

•  Широта  и  глубина  мышления  программи¬ 
рующего  на  Форте  не  ограничена  зако¬ 
стенелыми  формами.  « Кирпичики »,  с  по¬ 
мощью  которых  строится  программа , 
весьма  разнообразны  как  по  количеству , 
так  и  по  диапазону  сложности  Более 
того ,  лексикон  этих  «кирпичиков»  зави 
сит  исключительно  от  программиста  и 
им  же  обогащается ,  так  как  Форт  по 
своей  природе  расширяемый  язык. 

•  После  создания  каждого  нового  определения 
программист  легко  «прошрется»  с  деталя¬ 


ми,  освобождая  внимание  для  перехода  на 
более  высокий  структурный  уровень. 

•  Форт  одинаково  пригоден  как  для  сис¬ 
темного,  так  и  для  прикладного  програм¬ 
мирования 

•  Форпидля  БК-0011  делает  компьютер 
вполне  «серьезной»  и  « самостоятельной» 
машиной.  Не  секрет,  что  работа  на  БК- 
0011  до  сих  пор  шла  в  основном  по  пути 
не  всегда  эффективного  использования  бо¬ 
гатого  программного  обеспечения  от  БК- 
0010.  А  вот  поместив  Форт  на  БК-0011, 
пользователь  получает  в  свои  руки  все 
ресурсы  машины  —  и  «НАЯВІѴАЯЕ»  и 
«ЗОГТ1ѴАЯЕ» 

•  Форт  устроен  так,  что  легко  приспосаб¬ 
ливает  для  своих  нужд  «чужое»  програм 
мное  обеспечение  Так,  в  описываемой  вер¬ 
сии  (ѴЕЯ  2.0  ІАЫ  92),  имеется  слово 
«В ТО  АО»,  позволяющее  подгружать  к 
Форту  с  магнитофона  «чужие»  програм¬ 
мы  в  позиционно  независимом  коде  ( фай¬ 
лы,  созданные  « Меломаном »,  дезассемб¬ 
лер  ОІ5А5М  М  Цыпина  и  т.д. ),  а  пакет 
арифметики  с  плавающей  запятой  напря 
мую  использует  подпрограммы  из  ПЗУ 
Бейсика. 

•  Пакет  Форт-ассемблер  создает  интерак 
тивную  среду,  более  удобную,  нежели  при 
работе  с  М1ЯАСЕ,  ОТЛ12  или,  тем  более, 
при  работе  в  системах  «МІСЯО»  При 
этом  Форт-ассемблер  позволяет  приме¬ 
нять  как  локальные  (в  пределах  одного 
определения ),  так  и  глобальные  метки,  где 
последними  служат  обычные  Форт-слова 
(длиной  до  31  символа). 

•  Форт  имеет  средства  чтения  ЕБАЗР- 
текстов 

•  В  Форте  всегда  присутствует  свой  ре¬ 
дактор,  по  мощности  сопоставимый  с 
редактором  ЕИАЗР 

•  Если  компилятор  Бейсика  долгое  время 
был  «закрытой  зоной»  для  пользователей 
и  лишь  недавно  « вскрыт»  расторопным 
умельцами,  то  Форт  сразу  объявляет  себя 
открытым  для  всех,  даже  для  слабо  подго¬ 
товленных  пользователей  Форт  «насквозь 
просвечивается»  такими  мощными  средст- 
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вами  самодокументирования,  как 
КЕЮРТН,  ОЕСОМРІЕЕК,  ИЦМР 

•  Сколько  « слез  пролито »  программирую¬ 
щими  на  Бейсике  БК-0010. 01  из-за  отсут¬ 
ствия  в  системе  того  или  иного  операто¬ 
ра  (МЕЯОЕ,  5РЮТЕ,  МАТ  и  др  )!  А  суть 
программирования  на  Форте  как  раз  и 
заключается  в  создании  (определении)  но¬ 
вых  нужных  в  данный  момент  слов-опе¬ 
раторов ,  так  что  в  некотором  смысле 
можно  говорить  о  неисчерпаемости  Фор 
та 

А  чем  еще  необычен  Форт?  Вот  не¬ 
сколько  примеров: 

•  В  Форте  возможно  целочисленное  умно¬ 
жение  таких  величин.  ОСТ  377  400  *  (В 
Бейсике  при  этом  произошло  бы  перепол¬ 
нение ) 

•  Форт  позволяет  напечатать  результат 
в  нужном  вам  формате 

1)  ОСТ  377  400  *  . 

ОСТ  377  400  *  и 

Ответы  соответственно  будут  -400 

и  177400. 

2)  Поместим  два  кода  символов  в 
одно  слово: 

ОСТ  А8СІІ  Щ  400  *  А8СП  Я  +  и  <ВК> 

176761 

Теперь  введите  такую  строку: 

176761  8Р  @  2  ТУРЕ  СКОР 

ЯЩ 

(’ОПОР*  здесь  нужно  лишь  для  того, 
чтобы  не  «засорять»  стек  данных,  так  как 
ТУРЕ*  не  предназначено  для  печати  со 
стека  и  поэтому  данные  (176761)  остаются 
на  стеке  после  ТУРЕ*). 

Необычностей  в  Форте  много,  и  среди 
них  есть  такие  экзотические,  что  не  отпу¬ 
гивают,  а  скорее  завораживают  своими 
чудесными  и  ценными  свойствами.  Что 
вы,  например,  скажете  о  возможности  в 
Форте  присваивать  переменным  не  только 
величины,  но  и  действия,  т.е.  переменная 
в  некотором  роде  может  стать  операто- 

Пример  1. 
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ром,  и  таким,  каким  вам  заблаговолит- 
ся!?  Вот  пример  программы: 

ОКТ  ѴАК  А  ѴАК  В  ѴАК  С  1  N00?  С  ! 

:  А^\ѴЕК  А  @  В  @  С  @  ЕХЕСЕГГЕ  ; 

:  81ІМ  [•]  +  С  !  А№1ѴЕК  ; 

:  ОІРРЕК  П  -  С  !  А^ІѴЕК  ; 

:  МІЛ-  [•]  *  С  !  А№1ѴЕК  ; 

:  ОІѴ  [•]  /  С  !  АМ8\ѴЕК  ; 

:01ІАОК_8і;М  8ІЛМ  ОСТР  *  ; 

:  діМБР_БІРРЕК  ОІРРЕК  БЕІР  *  ; 

10  А  !  4  В  ! 

(В  зависимости  от  вводимого  вами 
слова  переменной  ‘С’  присваивается  соот¬ 
ветствующий  оператор,  который  исполня¬ 
ется  словом  ’ЕХЕСІЯЕ'). 

Поговорим  теперь  о  сложности  освое¬ 
ния  Форта.  Да,  Форт  действительно  до¬ 
статочно  сложен.  Когда  я  впервые  прочи¬ 
тал,  что  Форт  изобретен  Чарльзом  Муром, 
то  термин  «изобретен»  представился  мне 
несколько  высокомерным.  Теперь  же, 
когда  Форт  стал  моим  «вероисповедани¬ 
ем»,  я  преклоняюсь  перед  гением  созда¬ 
теля.  Уровень  погружения  в  Форт  безме¬ 
рен.  Занимаясь  Фортом  уже  более  3  лет, 
я  все  еще  ощущаю  себя  юнцом,  постоянно 
встречаясь  все  с  новыми  и  новыми  откро¬ 
вениями,  а  количество  непонятных  ве¬ 
щей,  пожалуй,  даже  растет. 

На  следующих  примерах  я  хочу  пока¬ 
зать,  что  самый  консервативный  учитель 
математики,  усвоивший  Бейсик  «на  всю 
оставшуюся  жизнь»,  или  самый  неради¬ 
вый  ученик  4—5  класса,  на  примере  че¬ 
тырех-пяти  игр  научившийся  осмысленно 
стучать  по  клавиатуре,  за  15-20  минут 
«инструктажа»  или  даже  самостоятельно 
вполне  могут  усвоить  на  приведенных  при¬ 
мерах  простейший  синтаксис  и  метод  про¬ 
граммирования  на  Форте  (заодно  попы- 
тайтесь-ка  решить  эти  же  задачки  средст¬ 
вами  Бейсика,  и  сравните  результат) 


:  ТАВЦЕ  ”СТОЛ”  ; 

:  СТОЛ  "ТАВЬЕ”; 

и  т.д.  -  вот  у  вас  уже  и  готов  англо-русский  и  русско-английский  словарь 
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Форт  позволяет  «открытым  текстом»,  в  том  числе  и  на  русском  языке  записы¬ 
вать  (а  в  этом  языке  программирования  правильно  записать  -  значит  уже  решить)  ус¬ 
ловия  задачи,  оформляя  их  как  «определения  через  двоеточие».  Запустив  на  испол¬ 
нение  последнее  слово  ’??',  вы  получите  на  своем  экране  строку  с  ответом: 


:  частей  алюминия 
:  частеймагния 
:  вес_разности 
:  разность  частей 
:  вес_  одной  части 
:  вес  алюминия 
:  вес  магния 
:  ?? 


19; 

2; 

34; 

частейалюминия  частей  магния  -  ; 
вес_разности  разность  частей  /  ; 
частей  алюминия  вес  одной  части  * ; 
частей  магния  вес  одной  части  •  ; 
ответ:  вес  сплава  -  ” 
вес  алюминия  вес  магния  +  .  кг”  ; 


?? 

ответ:  вес  сплава  -  42  кг 


Обратите  внимание:  мы  не  использо¬ 
вали  ни  одной  переменной.  В  решении 
этой  задачи  Форт  показал  нам  еще  одну 
свою  грань:  Форт  -  это  язык  специфика¬ 
ций.  (В  данном  случае  для  решения  задачи 
мы  обошлись  целочисленной  арифметикой. 
Синтаксис  при  использовании  арифметики 
с  плавающей  запятой  тот  же). 

И  в  заключение  хочу  отметить  следую¬ 
щее.  Еще  одно  «препятствие»,  по  мнению 
многих  оппонентов  (постфиксная  запись 
формул)  также  является,  на  мой  взгляд, 

ІІГЧРІХ  ВЬ  \ѴО!Ш  Г>ШМВЕК  СКОР  ; 


надуманным.  Во-первых  Форт  -  стековая 
система,  поэтому  когда  вы  научитесь  ду¬ 
мать  по-фортовски  (а  для  этого  надо  не¬ 
медленно  начать  программировать  на 
Форте),  постфиксная  запись  представит¬ 
ся  вам  вполне  естественной  (кроме  оп¬ 
равданных  исключений,  этот  принцип 
прослеживается  во  всем  словаре  Форта) 
А  во-вторых,  весьма  просто  переопреде¬ 
лить  способ  ввода  на  любой  (но  нужно  ли 
это?).  Вот  пример  для  инфиксной  записи. 


Теперь  можно  переопределить  любые  операторы: 

:  +  тРІХ  +  ; 

:  -  ПЧРІХ  -  ; 

;  АТО  НЧРІХ  АГО  ; 


и  Т.Д. 

И  теперь  можно  вводить  строки  формул  «обычным»  способом  (без  скобок! ). 

Вообще  говоря,  возможности  Форта,  мых  границ,  и  вы  наверняка  откроете  для 

как  тема  для  разговора,  не  имеют  види-  себя  много  нового  в  чудесном  мире  Форта. 


